package com.ruoyi.project.system.service.impl;

import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.exception.CustomException;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.framework.aspectj.lang.annotation.DataScope;
import com.ruoyi.framework.web.model.TreeSelect;
import com.ruoyi.project.system.entity.SysDept;
import com.ruoyi.project.system.mapper.SysDeptMapper;
import com.ruoyi.project.system.service.ISysDeptService;
import com.ruoyi.project.wework.apimodel.Department;
import org.apache.commons.collections.CollectionUtils;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import java.util.*;
import java.util.function.Function;
import java.util.stream.Collectors;

/**
 * 部门管理 服务实现
 *
 * @author thanks
 */
@Service
public class SysDeptServiceImpl implements ISysDeptService {
    @Autowired
    private SysDeptMapper deptMapper;

    /**
     * 查询部门管理数据
     *
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<SysDept> selectDeptList(SysDept dept) {
        return deptMapper.selectDeptList(dept);
    }

    /**
     * 构建前端所需要树结构
     *
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<SysDept> buildDeptTree(List<SysDept> depts) {
        List<SysDept> returnList = new ArrayList<SysDept>();
        List<Long> tempList = new ArrayList<Long>();
        for (SysDept dept : depts) {
            tempList.add(dept.getDeptId());
        }
        for (Iterator<SysDept> iterator = depts.iterator(); iterator.hasNext(); ) {
            SysDept dept = (SysDept) iterator.next();
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dept.getParentId())) {
                recursionFn(depts, dept);
                returnList.add(dept);
            }
        }
        if (returnList.isEmpty()) {
            returnList = depts;
        }
        return returnList;
    }

    /**
     * 构建前端所需要下拉树结构
     *
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts) {
        List<SysDept> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询部门树信息
     *
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Integer> selectDeptListByRoleId(Long roleId) {
        return deptMapper.selectDeptListByRoleId(roleId);
    }

    /**
     * 根据部门ID查询信息
     *
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public SysDept selectDeptById(Long deptId) {
        return deptMapper.selectDeptById(deptId);
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     *
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public int selectNormalChildrenDeptById(Long deptId) {
        return deptMapper.selectNormalChildrenDeptById(deptId);
    }

    /**
     * 是否存在子节点
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId) {
        int result = deptMapper.hasChildByDeptId(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 查询部门是否存在用户
     *
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId) {
        int result = deptMapper.checkDeptExistUser(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 校验部门名称是否唯一
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public String checkDeptNameUnique(SysDept dept) {
        Long deptId = StringUtils.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
        SysDept info = deptMapper.checkDeptNameUnique(dept.getDeptName(), dept.getParentId());
        if (StringUtils.isNotNull(info) && info.getDeptId().longValue() != deptId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 新增保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int insertDept(SysDept dept) {
        Long tenantId = SecurityUtils.getCurrTenantId();
        // 新增顶级部门
        if (null == dept.getParentId()) {
            dept.setParentId(0L);
            if (deptMapper.countTopByParentId(tenantId) >= 1) {
                throw new CustomException("只能添加一个顶级部门");
            }
            dept.setAncestors("0");
            dept.setTenantId(tenantId);
            dept.setStatus("0");
            dept.setDelFlag("0");
            return deptMapper.insertDept(dept);
        }

        SysDept info = deptMapper.selectDeptById(dept.getParentId());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.DEPT_NORMAL.equals(info.getStatus())) {
            throw new CustomException("部门停用，不允许新增");
        }
        dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
        dept.setTenantId(tenantId);
        return deptMapper.insertDept(dept);
    }

    /**
     * 修改保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int updateDept(SysDept dept) {
        SysDept newParentDept = deptMapper.selectDeptById(dept.getParentId());
        SysDept oldDept = deptMapper.selectDeptById(dept.getDeptId());
        if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept)) {
            String newAncestors = newParentDept.getAncestors() + "," + newParentDept.getDeptId();
            String oldAncestors = oldDept.getAncestors();
            dept.setAncestors(newAncestors);
            updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
        }
        int result = deptMapper.updateDept(dept);
        if (UserConstants.DEPT_NORMAL.equals(dept.getStatus())) {
            // 如果该部门是启用状态，则启用该部门的所有上级部门
            updateParentDeptStatus(dept);
        }
        return result;
    }

    /**
     * 修改该部门的父级部门状态
     *
     * @param dept 当前部门
     */
    private void updateParentDeptStatus(SysDept dept) {
        String updateBy = dept.getUpdateBy();
        dept = deptMapper.selectDeptById(dept.getDeptId());
        dept.setUpdateBy(updateBy);
        deptMapper.updateDeptStatus(dept);
    }

    /**
     * 修改子元素关系
     *
     * @param deptId       被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors) {
        List<SysDept> children = deptMapper.selectChildrenDeptById(deptId);
        for (SysDept child : children) {
            child.setAncestors(child.getAncestors().replace(oldAncestors, newAncestors));
        }
        if (children.size() > 0) {
            deptMapper.updateDeptChildren(children);
        }
    }

    /**
     * 删除部门管理信息
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Long deptId) {
        return deptMapper.deleteDeptById(deptId);
    }

    /**
     * 删除部门管理信息
     *
     * @param deptIds 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptByIds(List<Long> deptIds) {
        return deptMapper.deleteDeptByIds(deptIds);
    }

    @Override
    public List<SysDept> selectChildsListByDeptId(Long deptId, Long tenantId) {
        SysDept sysDept = this.selectDeptById(deptId);
        if(sysDept != null) {
            String ancestors = sysDept.getAncestors() + "," + deptId;
            List<SysDept> depts = deptMapper.selectConfigScheDefineListByAncestors(ancestors, tenantId);
            return depts;
        }

        return new ArrayList<>();
    }

    @Override
    public Map<Long, SysDept> selectDeptMapByIds(List<Long> deptIds, Long tenantId) {
        if(CollectionUtils.isEmpty(deptIds)) {
            return new HashMap<>();
        }
        List<SysDept> sysDepts = deptMapper.selectDeptByIds(deptIds, tenantId);

        Map<Long, SysDept> collect = sysDepts.stream().collect(Collectors.toMap(SysDept::getDeptId, Function.identity()));
        return collect;
    }

    @Override
    public Map<Long, SysDept> selectDeptMapById(Long deptId, Long tenantId) {
        if(deptId == null) {
            return new HashMap<>();
        }
        return this.selectDeptMapByIds(Arrays.asList(deptId), tenantId);
    }

    /**
     * 兼容旧组织模式。。这种怎么做也不能做好， 但是不会删除数据相对安全
     * @param departments
     * @param platformType
     * @param operatorId
     * @param tenantId
     */
    @Transactional(rollbackFor = Exception.class)
    @Override
    public void syncDept(List<Department> departments, int platformType, Long operatorId, Long tenantId) {
        if(CollectionUtils.isNotEmpty(departments)) {
            Date now = new Date();
            List<Long> outIds = departments.stream().map(Department::getId).collect(Collectors.toList());
            List<SysDept> sysDepts = deptMapper.selectDeptByOutIds(outIds, platformType, tenantId);

            List<SysDept> toSave = new ArrayList<>();
            List<SysDept> toUpdate = new ArrayList<>();
            if(CollectionUtils.isNotEmpty(sysDepts)) {
                for (Department department : departments) {
                    SysDept existed = filterExistSysDeptByOutId(sysDepts, department);
                    if(existed != null) {
                        existed.setDeptName(department.getName());
                        existed.setOutId(department.getId());
                        existed.setOrderNum(String.valueOf(department.getOrder()));
                        existed.setParentOutId(department.getParentid());
                        if(existed.getParentId() == null) {

                            SysDept parent = filterExistSysDeptByParentOutId(sysDepts, department);
                            if(parent != null) {
                                existed.setParentId(parent.getDeptId());
                                existed.setAncestors(parent.getAncestors() + "," + existed.getParentId());
                            }
                        }
                        existed.setLeader(org.apache.commons.lang3.StringUtils.join(department.getDepartment_leader(), ","));
                        existed.setUpdateTime(now);
                        toUpdate.add(existed);
                    } else {
                        // 新增
                        SysDept existedParent = filterExistSysDeptByParentOutId(sysDepts, department);
                        SysDept newDept = getSysDept(platformType, department, existedParent, now, operatorId, tenantId);
                        toSave.add(newDept);
                    }

                }
            } else {
                toSave = departments.stream().map(department -> {
                    SysDept existedParent = filterExistSysDeptByParentOutId(sysDepts, department);
                    SysDept sysDept = getSysDept(platformType, department, existedParent, now, operatorId, tenantId);
                    return sysDept;
                }).collect(Collectors.toList());

            }

            //
            doSave(toSave);
            doUpdate(toUpdate);

            // 根据 parentOutId 重新清洗 Parent TODO
        }
    }

    private SysDept filterExistSysDeptByParentOutId(List<SysDept> sysDepts, Department department) {
        for (SysDept sysDept : sysDepts) {
            if(sysDept.getOutId().equals(department.getParentid())) {
                return sysDept;
            }
        }
        return null;
    }

    @Override
    public void syncDeptClean(List<Department> departments, int platformType, Long operatorId, Long tenantId) {
        // delete
        SysDept queryparam = new SysDept();
        queryparam.setTenantId(tenantId);
        List<SysDept> sysDepts = this.selectDeptList(queryparam);
        if(CollectionUtils.isNotEmpty(sysDepts)) {
            List<Long> ids = sysDepts.stream().map(SysDept::getDeptId).collect(Collectors.toList());
            this.deleteDeptByIds(ids);
        }

        Date now = new Date();
        // 再重新插入
        // TODO 做排序处理
    }

    private SysDept getSysDept(int platformType, Department department, SysDept parent, Date date, Long operatorId, Long tenantId) {
        SysDept newDept = new SysDept();
        newDept.setOutType(platformType);
        newDept.setTenantId(tenantId);
        newDept.setDeptName(department.getName());
        newDept.setOutId(department.getId());
        newDept.setOrderNum(String.valueOf(department.getOrder()));
        newDept.setParentOutId(department.getParentid());
        newDept.setLeader(org.apache.commons.lang3.StringUtils.join(department.getDepartment_leader(), ","));
        newDept.setDelFlag("0");
        newDept.setCreateBy(operatorId.toString());
        newDept.setCreateTime(date);
        newDept.setStatus("0");

        if(parent != null) {
            newDept.setParentId(parent.getDeptId());
            newDept.setAncestors(parent.getAncestors() + "," + newDept.getParentId());
        } else {

            newDept.setParentId(0L);
            newDept.setAncestors("0");
        }
        return newDept;
    }

    private SysDept filterExistSysDeptByOutId(List<SysDept> sysDepts, Department department) {
        for (SysDept sysDept : sysDepts) {
            if(sysDept.getOutId().equals(department.getId())) {
                return sysDept;
            }
        }
        return null;
    }

    private void doUpdate(List<SysDept> toUpdates) {
        if(CollectionUtils.isNotEmpty(toUpdates)) {
//            this.deptMapper.batchUpdate(toUpdate);
            toUpdates.forEach(tmp -> {
                this.deptMapper.updateDept(tmp);
            });

        }
    }

    private void doSave(List<SysDept> toSave) {
        if(CollectionUtils.isNotEmpty(toSave)) {
            this.deptMapper.batchInsert(toSave);
        }
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysDept> list, SysDept t) {
        // 得到子节点列表
        List<SysDept> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysDept tChild : childList) {
            if (hasChild(list, tChild)) {
                // 判断是否有子节点
                Iterator<SysDept> it = childList.iterator();
                while (it.hasNext()) {
                    SysDept n = (SysDept) it.next();
                    recursionFn(list, n);
                }
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysDept> getChildList(List<SysDept> list, SysDept t) {
        List<SysDept> tlist = new ArrayList<SysDept>();
        Iterator<SysDept> it = list.iterator();
        while (it.hasNext()) {
            SysDept n = (SysDept) it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue()) {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysDept> list, SysDept t) {
        return getChildList(list, t).size() > 0 ? true : false;
    }
}
